use strict;
use warnings;

use Math::VectorReal;


my $a    = vector(1,1,1);
my $drag = $a + vector(1,1,1);
print "\$a => $a\n";
print "\$drag => $drag\n";

